Option Explicit
Private Sub Command1_Click()
Picture1.Picture = LoadPicture("axe morde nazar inja qarar migirad ba formate an")
End Sub
Private Sub Command2_Click()
Picture1.Picture = LoadPicture("")
End Sub
Private Sub Command3_Click()
Picture1.PaintPicture Picture1.Picture, 0, 0, , , , , , , vbDstInvert
End Sub
:: موضوعات مرتبط:
☺کــــــدهای برنامه نویســــــی☺ ,
,
:: برچسبها:
برنامه معکوس کردن تصویر،ویژوال بیسیک،invert,vbDstinvert,معکوس ,
:: بازدید از این مطلب : 846
<-PostRate->
|
امتیاز مطلب : <-PostRateResult->
|
تعداد امتیازدهندگان : <-PostRateCount->
|
مجموع امتیاز : <-PostRateTotal->
عضو شوید
عضویت سریع
آمار
وب سایت:
آمار مطالب
آمار بازدید
